home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / WebObjects / WebObjectsDoc_HTML / Reuse / ReusableComponentsEx / ObjectEditorEx.wo / ObjectEditorEx.wos < prev   
Encoding:
Text File  |  1996-03-03  |  1.4 KB  |  67 lines
  1. ////////////////////////
  2. //  ObjectEditor
  3. //  by Charles Lloyd
  4. ////////////////////////
  5.  
  6.  
  7. //////////////////////////
  8. // User Settable Items
  9. //////////////////////////
  10. persistent id localKeyArray;
  11. persistent id localLabelArray;
  12. persistent id localObject;
  13.  
  14. //////////////////////
  15. //    Internal State
  16. //////////////////////
  17. persistent id isEditable;
  18. persistent id editableString;
  19.  
  20. persistent id cellPadding;
  21.  
  22. - awake
  23. {
  24.     if (!localObject) {
  25.         localKeyArray = @(
  26.                           "Title",
  27.                           "First_Name",
  28.                           "Last_Name",
  29.                           "Street",
  30.                           "City",
  31.                           "State",
  32.                           "Zip"
  33.                           );
  34.         localObject = @{
  35.             "Title" = "Mr";
  36.             "First_Name" = "Joseph";
  37.             "Last_Name" = "Bleaux";
  38.             "Street" = "123 Maple";
  39.             "City" = "Reno";
  40.             "State" = "NV";
  41.             "Zip" = "89444";
  42.         };
  43.         localObject = [[localObject mutableCopy] autorelease];
  44.         localLabelArray = localKeyArray;
  45.         isEditable = NO;
  46.         [self toggleEditable];
  47.     }
  48. }
  49.  
  50. - processForm
  51. {
  52.     return self;
  53. }
  54.  
  55. - toggleEditable
  56. {
  57.     if (isEditable == YES) {
  58.         isEditable = NO;
  59.         editableString = @"Make Editable";
  60.         cellPadding = 4;
  61.     } else {
  62.         isEditable = YES;
  63.         editableString = @"Make Read Only";
  64.         cellPadding = 0;
  65.     }
  66. }
  67.